home *** CD-ROM | disk | FTP | other *** search
/ PC World 2006 December / PCWorld_2006-12_cd.bin / domacnost a kancelar / scriptcad / scrptcad.exe / DEMO2.VIC < prev    next >
Text File  |  2006-10-07  |  2KB  |  51 lines

  1. MaximumX = 50
  2. MaximumY = 30
  3. PixelsPerUnit = 10
  4. BackgroundColor = White
  5. DefaultColor = Black
  6. DefaultFontName = "Arial"
  7. DefaultFontSize = 2
  8. DefaultDimAngle = 10
  9. DefaultDimLength = 10
  10. ShiftX = 0
  11. ShiftY = 0
  12.  
  13. Procedure Battery #x, #y
  14.    Line #x, #y-1.5, #x, #y+1.5, Solid, 1, DefaultColor
  15.    Line #x + 0.3, #y - 3, #x + 0.3, #y + 3, Solid, 1, DefaultColor
  16.    Text #x + 0.2, #y - 4.9, "+", 0,0,0,0, DefaultFontName, DefaultColor, DefaultFontSize, 0
  17.    Line #x + 0.3, #y, #x + 1.5, #y, Solid, 1, DefaultColor
  18. End
  19.  
  20. Procedure Resistor #x, #y, #Index, #R
  21.    Rectangle #x, #y, #x + 6, #y + 2, Solid, 1, DefaultColor
  22.    Text #x, #y + 2.5, "R", 0,0,0,0, DefaultFontName, DefaultColor, DefaultFontSize, 0
  23.    Text #x + 1.1, #y + 3.5, "#Index", 0,0,0,0, DefaultFontName, DefaultColor, DefaultFontSize, 0
  24.    Text #x + 2, #y + 2.5, "=", 0,0,0,0, DefaultFontName, DefaultColor, DefaultFontSize, 0
  25.    Text #x + 3.6, #y + 2.4, "#R" + " W", 0,0,0,0, "Symbol", DefaultColor, DefaultFontSize, 0
  26. End
  27.  
  28. Battery 18, 7
  29. Battery 19.5, 7
  30. Battery 21, 7
  31. Battery 22.5, 7
  32.  
  33. Resistor 12, 15, 1, 6
  34. Resistor 12, 23, 2, 12
  35. Resistor 29, 19, 3, 6
  36.  
  37. Line 18, 7, 5, 7, Solid, 1, DefaultColor
  38. Line 5, 7, 5, 20, Solid, 1, DefaultColor
  39. Line 5, 20, 10, 20, Solid, 1, DefaultColor
  40. Line 20, 20, 29, 20, Solid, 1, DefaultColor
  41. Line 35, 20, 38, 20, Solid, 1, DefaultColor
  42. Line 38, 20, 38, 7, Solid, 1, DefaultColor
  43. Line 38, 7, 24, 7, Solid, 1, DefaultColor
  44.  
  45. Line 10, 16, 10, 24, Solid, 1, DefaultColor
  46. Line 20, 16, 20, 24, Solid, 1, DefaultColor
  47. Line 10, 16, 12, 16, Solid, 1, DefaultColor
  48. Line 18, 16, 20, 16, Solid, 1, DefaultColor
  49. Line 10, 24, 12, 24, Solid, 1, DefaultColor
  50. Line 18, 24, 20, 24, Solid, 1, DefaultColor
  51.